function [ k ] = kappaForSigma( sigma, N )


v = asymptoticvbar(sigma);

o = optimset('Display','off');

f = @(x, xdata)fitFunction(x,xdata,sigma);

k = lsqcurvefit(f,1,N,v,[],[],o);

end

